Profile of (eval 15)[Exception/Class.pm:180]

Filename	(eval 15)[/home/ss5/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Exception/Class.pm:180]
Statements	Executed 4 statements in 299µs
Eval Invoked At	/home/ss5/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Exception/Class.pm line 180
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	37µs	477µs	Iterator::X::IO_Error::::BEGIN@3Iterator::X::IO_Error::BEGIN@3
0	0	0	0s	0s	Iterator::X::IO_Error::::FieldsIterator::X::IO_Error::Fields
0	0	0	0s	0s	Iterator::X::IO_Error::::descriptionIterator::X::IO_Error::description
0	0	0	0s	0s	Iterator::X::IO_Error::::os_errorIterator::X::IO_Error::os_error

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					package Iterator::X::IO_Error;
2
3	2	289µs	2	917µs	# spent 477µs (37+440) within Iterator::X::IO_Error::BEGIN@3 which was called: # once (37µs+440µs) by Exception::Class::_make_subclass at line 3 use base qw(Iterator::X); # spent 477µs making 1 call to Iterator::X::IO_Error::BEGIN@3 # spent 440µs making 1 call to base::import
4
5	1	2µs			our $VERSION = '1.1';
6
7	1	9µs			1;
8
9					sub description
10					{
11					return 'An I/O error occurred';
12					}
13					sub Fields { return ($_[0]->SUPER::Fields, 'os_error') }
14
15					sub os_error { $_[0]->{os_error} }
16
17					;